VBA语言的基础认识

2023-11-21 14:24| 来源: 网络整理| 查看: 265

第一节：标识符

一、定义

标识符是一种标识变量、常量、过程、函数、类等语言构成单位的符号，利用它可以完成对变量、常量、过程、函数、类等引用。

二、命名规则

（1）字母打头，由字母、数字和下划线组成，如A987b_23Abc

（2）字符长度小于40，（Excel2002以上中文版本等，可以用汉字且长度可达254个字符）

（3）不能与VB保留字重名，如public，private，dim，goto，next，with，integer，single等

第二节：运算符定义：运算符是代表VB某种运算功能的符号。（1）赋值运算符 = （2）数学运算符 &（强制字符连接）、+ (运算符两边都是字符时连接字符)、+(运算符两边都是数字时为加法运算符)、-（减）、Mod（取余）、\（整除）、*（乘）、/（除）、-（负号）、^（指数）（3）逻辑运算符Not（非）、And（与）、Or(或)、Xor(异或)、Eqv(相等)、Imp(隐含) （4）关系运算符 = （相同）、（不等）、>（大于）、=（不小于）、B And C250 Then x=x-100 或者，可以使用块形式的语法： If condition Then [statements] [ElseIf condition-n Then [elseifstatements] ... [Els] [elsestatements]] End If 如1:If Number < 10 Then Digits = 1 ElseIf Number < 100 Then Digits = 2 Else Digits = 3 End If （2）Select Case…Case…End Case语句如1：Select Case Pid Case “A101” Price=200 Case “A102” Price=300 …… Case Else Price=900 End Select

（3）Choose 函数 choose(index, choice-1,choice-2,…,choice-n)

可以用来选择自变量串列中的一个值，并将其返回，index 必要参数，数值表达式或字段，它的运算结果是一个数值，且界于 1 和可选择的项目数之间。choice 必要参数，Variant表达式，包含可选择项目的其中之一。如：GetChoice = Choose(Ind, "Speedy", "United", "Federal")

（4）Switch函数 Switch(expr-1, value-1[, expr-2, value-2 _ [, expr-n,value-n]])

switch 函数和 Choose 函数类似，但它是以两个一组的方式返回所要的值，在串列中，最先为 TRUE 的值会被返回。 expr 必要参数，要加以计算的 Variant 表达式。value 必要参数。如果相关的表达式为 True，则返回此部分的数值或表达式，没有一个表达式为 True，Switch 会返回一个 Null值。

第九节：循环语句（1）For Next语句以指定次数来重复执行一组语句For counter = start To end [Step step] ＇step 缺省值为1 [statements] [Exit For] [statements] Next [counter] 如1： For Words = 10 To 1 Step -1 ＇建立 10 次循环 For Chars = 0 To 9 ＇建立 10 次循环 MyString = MyString & Chars ＇将数字添加到字符串中 Next Chars ＇Increment counter MyString = MyString & " " ＇添加一个空格 Next Words （2）For Each…Next 语句主要功能是对一个数组或集合对象进行，让所有元素重复执行一次语句For Each element In group Statements [Exit for] Statements Next [element] 如1：For Each rang2 In range1 With range2.interior .colorindex=6 .pattern=xlSolid End with Next 这上面一例中用到了 With…End With 语句，目的是省去对象多次调用，加快速度；语法为：With object [statements] End With （3）Do…loop语句在条件为true时，重复执行区块命令 Do {while |until} condition' while 为当型循环，until为直到型循环，顾名思义，不多说啦 Statements Exit do Statements Loop 或者使用下面语法：Do ' 先do 再判断，即不论如何先干一次再说 Statements Exit do Statements Loop {while |until} condition 第十节其他类语句和错误语句处理一．其他循环语句结构化程序使用以上判断和循环语句已经足够，建议不要轻易使用下面的语句，虽然 VBA 还支持。（1）Goto line 该语句为跳转到line语句行（2） On expression gosub destinatioinlist 或者 on expression goto destinationlist 语句为根据 exprssion表达式值来跳转到所要的行号或行标记（3）Gosub line…line…Return语句， Return 返回到 Gosub line行，如下例：Sub gosubtry() Dim num Num=inputbox(“输入一个数字，此值将会被判断循环”) If num>0 then Gosub Routine1 ：Debug.print num：Exit sub Routine1: Num=num/5 Return End sub （4）while…wend语句，只要条件为TRUE，循环就执行，这是以前VB老语法保留下来的，如下例：while condition ‘while I

【本文地址】

公司简介

联系我们